home *** CD-ROM | disk | FTP | other *** search
/ Computer Life 1997 February / Computer Life February 1997.iso / TELME / DISK_01 / INSTALL.INF < prev    next >
Encoding:
Text File  |  1996-05-29  |  8.3 KB  |  230 lines
  1. ;       PhoneLink Script Language v0.01                            
  2. ;       (c)PhoneLink plc                                           
  3. ;  
  4. ;       Install Script File for Installing - Tel-Me v3.00
  5. ;       
  6. ;       Created by Simon May & Andy Walker - 03/05/95 Tel-Me v2.00 
  7. ;       Ammended by John Christiansen      - 20/09/95 Tel-Me v2.10 
  8. ;                                          - 05/03/96 Tel-Me v3.00 
  9. ;--------------------------------------------------------------------
  10. :START
  11.     MAINTEXT "Welcome To Tel-Me"
  12.         $InstallDir     = "C:\TELME"
  13.         $InstallFrom    = "A:\"
  14.         $Name           = " "
  15.         $Company        = " "
  16.         $Type           = "LOCAL"
  17.             $WinDir         = "C:\WINDOWS"    
  18.             $SysDir         = "C:\WINDOWS\SYSTEM"
  19.         #App            = "0"
  20.         #Product        = "0"
  21.         $PrdBmpDir      = $InstallDir
  22.         $NameOfProd     = "Any name"
  23.         $PathAppBmp     = $InstallDir
  24.         $KeepSettings   = "YES"
  25.         $MainBmp        = " "
  26.             $CheckAddr      = " "    
  27.             $DestAddr       = " "
  28.         SYS_RUN $MainBmp
  29.  
  30. ;--------------------------------------------------------------------
  31. :INTRO
  32.     INTRODIALOG "Introduction" $InstallFrom, $InstallDir, $KeepSettings
  33.     INITFIB $InstallFrom, $InstallDir
  34.     OPTIONSDIALOG "Install Options", $InstallDir
  35.     GETTYPE $Type
  36.         GETWINDIR $WinDir
  37.  
  38.         IF $Type="IMAGE", GOTO COPY        
  39.         IF $Type="REMOTE", GOTO COPY        
  40.  
  41.         CHECKTMVER "AddressBook", "Directory", $CheckAddr, "YES"
  42.         $DestAddr=$InstallDir+"\Addrbook\"
  43.  
  44.         IF $CheckAddr ! "", GOTO REG
  45.  
  46. :COPY
  47.            IF $Type="IMAGE", $DestAddr=$InstallDir+"\DISK_01\"
  48.            IF $Type="REMOTE", $DestAddr=$InstallDir+"\"
  49.  
  50.            COPYFILE $InstallFrom, $DestAddr, "ADDRBOOK.ADF", "NO"
  51.            COPYFILE $InstallFrom, $DestAddr, "ADDRBOOK.ADV", "NO"
  52.            COPYFILE $InstallFrom, $DestAddr, "ADDRBOOK.ANH", "NO"
  53.            COPYFILE $InstallFrom, $DestAddr, "ADDRBOOK.AIH", "NO"
  54.            COPYFILE $InstallFrom, $DestAddr, "ADDRBOOK.AMH", "NO"
  55.            COPYFILE $InstallFrom, $DestAddr, "ADDRBOOK.ATH", "NO"
  56.            COPYFILE $InstallFrom, $DestAddr, "ADDRBOOK.AVH", "NO"
  57.            COPYFILE $InstallFrom, $DestAddr, "ADDRBOOK.AUH", "NO"
  58.            COPYFILE $InstallFrom, $DestAddr, "ADDRBOOK.CDF", "NO"
  59.            COPYFILE $InstallFrom, $DestAddr, "ADDRBOOK.CDV", "NO"
  60.            COPYFILE $InstallFrom, $DestAddr, "ADDRBOOK.CNH", "NO"
  61.            IF $Type="REMOTE", GOTO REG     
  62.            IF $Type="IMAGE", GOTO REG
  63.            SETTMVER "AddressBook", "Directory", $DestAddr
  64.  
  65. :REG
  66.         IF $KeepSettings = "YES", GOTO STARTPROG
  67.         REGISTERDIALOG "Registration" $Name, $Company
  68.  
  69. :STARTPROG
  70.     STARTPROGRESS
  71.     GETSTARTAPP #App
  72.     COPYSYSFILES
  73.     
  74. ;--------------------------------------------------------------------
  75. :APP_LOOP_START
  76.         IF #App = "-1", GOTO APP_LOOP_COMPLETE
  77.        COPYAPPBMP #App, $PathAppBmp
  78.            BITMAP RIGHT, BOTTOM, $PathAppBmp
  79.        COPYAPPINI #App, $KeepSettings
  80.            SETINI #App, "0", "TMInformation", "Copyright", "(c) Phonelink plc 1993-1996"
  81.            SETINI #App, "0", "TMInformation", "Version", "Tel-Me Version 3.00 Standard Installation"
  82.            SETINI #App, "0", "TMInformation", "KeyWord", $Type
  83.            GETSTARTPRD #App, #Product
  84.     
  85. :PRODUCT_LOOP_START
  86.         IF #Product = "-1", GOTO PRODUCT_LOOP_COMPLETE
  87.        COPYPRDINI #App, #Product
  88.        COPYPRDBMP #App, #Product, $ProdBmpDir
  89.                BITMAP CENTRE, 15, $ProdBmpDir
  90.                COPYPRD #App, #Product
  91.                SETINI #App, #Product
  92.                GETNEXTPRD #App, #Product
  93.         GOTO PRODUCT_LOOP_START
  94.  
  95. :PRODUCT_LOOP_COMPLETE
  96.         IF $KeepSettings = "YES", GOTO SKIPREGISTRATION
  97.         IF #App = "-1", GOTO SKIPREGISTRATION
  98.            SETINI #App, "0", "Registration Info", "Name", $Name
  99.        SETINI #App, "0", "Registration Info", "Company", $Company
  100.         
  101. :SKIPREGISTRATION
  102.     GETNEXTAPP #App
  103.     
  104. GOTO APP_LOOP_START
  105.  
  106. :APP_LOOP_COMPLETE
  107.     ENDPROGRESS
  108.            LATE $InstallFrom, $InstallDir, 10
  109.                 IF $Type = "USER", GOTO NETIAC
  110.                 GOTO NOTNETIAC
  111.  
  112. :NETIAC
  113.                 CREATEDIR $InstallDir + "\IAC"
  114.  
  115. :NOTNETIAC
  116.         CREATEDIR $InstallDir + "\DEFAULT"
  117.         CREATEDIR $InstallDir + "\RONLIB"                
  118.                 CREATEDIR $InstallDir + "\IAC\ALERTS"
  119.  
  120.         WRITEBUILTFIB
  121.     VALIDATE $InstallDir
  122.  
  123.         IF $Type = "USER", GOTO USER_ICONS
  124.         IF $Type = "REMOTE", GOTO REMOTE
  125.         IF $Type = "IMAGE", GOTO MESSAGE
  126.  
  127. ;--------------------------------------------------------------------
  128. :LOCAL
  129.     UPDATE_TMVER $InstallDir
  130.     UPDATE_TMVER $InstallDir+"\UPGRADE"
  131.     VERSIONFILE $InstallDir+"\COMMS\TMRLS.DAT"
  132.                                                                               
  133.     DELFILE $InstallDir+"\email\subdom.dll"
  134.     DELFILE $InstallDir+"\email\mailtool.dll"
  135.     DELFILE $InstallDir+"\comms\bt2400.1"
  136.     DELFILE $InstallDir+"\comms\bt2400.2"
  137.     DELFILE $InstallDir+"\comms\fmodem.db"
  138.     DELFILE $InstallDir+"\comms\fmodem.dll"
  139.     DELFILE $InstallDir+"\comms\errorsrp.txt"
  140.     DELFILE $InstallDir+"\classfd\headings.dat"
  141.     DELFILE $InstallDir+"\classfd\headings.hix"
  142.         DELFILE $InstallDir+"\expotel\expotel.txt"
  143.  
  144.     ICON_START
  145.             CREATE_GROUP "Tel-Me", "", "NO"
  146.         
  147.         REMICON "Tel-Me"
  148.         REMICON "Tel-Me Comms Setup"                
  149.         REMICON "Tel-Me Supervisor"
  150.         REMICON "Tel-Me User Admin"               
  151.         REMICON "Tel-Me Install"
  152.         REMICON "Tel-Me Upgrade"
  153.         REMICON "Comms Setup"
  154.         REMICON "Upgrade\Tool"
  155.         REMICON "Upgrade Tool"
  156.         REMICON "Daily Post"
  157.         REMICON "Registration On-Line"
  158.         REMICON "Register for Tel-Me"
  159.         REMICON "Read Me"
  160.             REMICON "Read-Me"
  161.  
  162.             ADDICON $InstallDir+"\HRNSTART.EXE "+$InstallDir", "Tel-Me", "0"
  163.         ADDICON $InstallDir+"\COMMS\SETUP.EXE -i"+$InstallDir+"\TELME.INI", "Tel-Me Comms Setup", "0"
  164.         ADDICON $InstallDir+"\INTRO.EXE USERADMIN " +$InstallDir+"\TMADMIN.EXE -i"+$InstallDir+"\TELME.INI", "Tel-Me User Admin", "0", $InstallDir+"\TMADMIN.EXE"
  165.         ADDICON $InstallDir+"\INSTALL.EXE ", "Tel-Me Install", "0"
  166.         ADDICON $InstallDir+"\INTRO.EXE UPGRADE " +$InstallDir+"\UPGRADE\UPGRADE.EXE", "Upgrade Tool", "0", $InstallDir+"\UPGRADE\UPGRADE.DLL"
  167.         ADDICON "WRITE.EXE "+$InstallDir+"\README.WRI", "Read Me", "0" 
  168.     
  169.         IF $KeepSettings = "NO", GOTO NEW
  170.         RUNAPP $InstallDir+"\COMMS\SETUP.EXE -r -i"+$InstallDir+"\TELME.INI"
  171.         GOTO END        
  172.     
  173. :NEW
  174.     RUNAPP $InstallDir+"\COMMS\SETUP.EXE -i"+$InstallDir+"\TELME.INI"
  175.  
  176.         GOTO END
  177.  
  178. ;--------------------------------------------------------------------
  179. :USER_ICONS
  180.     UPDATE_TMVER $InstallDir
  181.         UPDATE_TMVER $InstallDir+"\UPGRADE"
  182.  
  183.     ICON_START
  184.             CREATE_GROUP "Tel-Me", "", "NO"
  185.         
  186.         REMICON "Tel-Me"
  187.         REMICON "Tel-Me Comms Setup"                
  188.         REMICON "Tel-Me Supervisor"
  189.         REMICON "Tel-Me User Admin"               
  190.         REMICOM "Tel-Me Upgrade"                
  191.         REMICON "Tel-Me Install"
  192.         REMICON "Comms Setup"
  193.         REMICON "Upgrade\Tool"
  194.         REMICON "Upgrade Tool"
  195.         REMICON "Daily Post"
  196.         REMICON "Registration On-Line"
  197.         REMICON "Register for Tel-Me"
  198.         REMICON "Read Me"
  199.             REMICON "Read-Me"
  200.  
  201.             ADDICON $InstallFrom+"\HARNESS.EXE -i"+$InstallDir+"\TELME.INI", "Tel-Me", "0"
  202.         ADDICON $InstallFrom+"\COMMS\SETUP.EXE -i"+$InstallDir+"\TELME.INI", "Tel-Me Comms Setup", "0"
  203.         ADDICON $InstallFrom+"\INTRO.EXE USERADMIN " +$InstallFrom+"\TMADMIN.EXE -i"+$InstallDir+"\TELME.INI", "Tel-Me User Admin", "0", $InstallFrom+"\TMADMIN.EXE"
  204.             ADDICON "WRITE.EXE "+$InstallFrom+"\README.WRI", "Read Me", "0" 
  205.  
  206.     ICON_CLEANUP
  207.  
  208.         CREATEDIR $InstallDir+"\EMAIL"
  209.  
  210.         IF $KeepSettings = "NO", GOTO NEWNW
  211.         RUNAPP $InstallFrom+"\COMMS\SETUP.EXE -r -i"+$InstallDir+"\TELME.INI"
  212.         GOTO END        
  213.     
  214. :NEWNW
  215.     RUNAPP $InstallFrom+"\COMMS\SETUP.EXE -i"+$InstallDir+"\TELME.INI"
  216.         GOTO END
  217.  
  218. ;--------------------------------------------------------------------
  219. :REMOTE
  220.     VERSIONFILE $InstallDir+"\COMMS\TMRLS.DAT"
  221.         GOTO MESSAGE
  222.  
  223. ;--------------------------------------------------------------------
  224. :MESSAGE
  225.     $InstalledMessage = "Tel-Me Has Finished Installing To " + $InstallDir
  226.     MESSAGEBOX $InstalledMessage
  227.         GOTO END
  228.  
  229. :END
  230.